﻿Public Class conceptosBE
#Region "Miembros"
    Private m_IdCFDConceptos As Integer
    Private m_IdCFDFacturas As Integer
    Private m_IdEmpresa As Integer
    Private m_Clave As String
    Private m_Cantidad As Double
    Private m_Unidad As String
    Private m_NoIdentificacion As String
    Private m_Descripcion As String
    Private m_ValorUnitario As Double
    Private m_Importe As Double
    Private m_PorcDescValorUnitario As Int16
    Private m_ValDescValorUnitario As Double
    Private m_ImporteConDesc As Double
    Private m_IdImpuestos As Integer
    Private m_TrasTasa As String
    Private m_TrasImporte As Double
    Private m_IVA As Double
    Private m_IEPS As Double
    Private m_IVBSS As Double
    Private m_Estatal As Double
    Private m_ISR As Double
    Private m_Predial As String
    Private m_NumAduana As String
    Private m_FechaAduana As Date
    Private m_NombreAduana As String
    Private m_ivaPA As Double
    Private m_isrPA As Double
    Private m_iepsPA As Double
    Private m_ivbssPA As Double
    Private m_estatalPA As Double
    Private m_tipoIVA As String
    Private m_tasaIVA As Double
    Private m_tasaIEPS As Double
    Private m_tasaRetIVA As Double
    Private m_tasaRetISR As Double
    Private m_impIVA As Double
    Private m_impIEPS As Double
    Private m_impRIVA As Double
    Private m_impISR As Double
#End Region

#Region "Propiedades"
    Public Property IdCFDConceptos() As Integer
        Get
            Return m_IdCFDConceptos
        End Get
        Set(ByVal value As Integer)
            m_IdCFDConceptos = value
        End Set
    End Property

    Public Property IdCFDFacturas() As Integer
        Get
            Return m_IdCFDFacturas
        End Get
        Set(ByVal value As Integer)
            m_IdCFDFacturas = value
        End Set
    End Property

    Public Property IdEmpresa() As Integer
        Get
            Return m_IdEmpresa
        End Get
        Set(ByVal value As Integer)
            m_IdEmpresa = value
        End Set
    End Property

    Public Property Clave() As String
        Get
            Return m_Clave
        End Get
        Set(ByVal value As String)
            m_Clave = value
        End Set
    End Property

    Public Property Cantidad() As Double
        Get
            Return m_Cantidad
        End Get
        Set(ByVal value As Double)
            m_Cantidad = value
        End Set
    End Property

    Public Property Unidad() As String
        Get
            Return m_Unidad
        End Get
        Set(ByVal value As String)
            m_Unidad = value
        End Set
    End Property

    Public Property NoIdentificacion() As String
        Get
            Return m_NoIdentificacion
        End Get
        Set(ByVal value As String)
            m_NoIdentificacion = value
        End Set
    End Property

    Public Property Descripcion() As String
        Get
            Return m_Descripcion
        End Get
        Set(ByVal value As String)
            m_Descripcion = value
        End Set
    End Property

    Public Property ValorUnitario() As Double
        Get
            Return m_ValorUnitario
        End Get
        Set(ByVal value As Double)
            m_ValorUnitario = value
        End Set
    End Property

    Public Property Importe() As Double
        Get
            Return m_Importe
        End Get
        Set(ByVal value As Double)
            m_Importe = value
        End Set
    End Property

    Public Property PorcDescValorUnitario() As Int16
        Get
            Return m_PorcDescValorUnitario
        End Get
        Set(ByVal value As Int16)
            m_PorcDescValorUnitario = value
        End Set
    End Property

    Public Property ValDescValorUnitario() As Double
        Get
            Return m_ValDescValorUnitario
        End Get
        Set(ByVal value As Double)
            m_ValDescValorUnitario = value
        End Set
    End Property

    Public Property ImporteConDesc() As Double
        Get
            Return m_ImporteConDesc
        End Get
        Set(ByVal value As Double)
            m_ImporteConDesc = value
        End Set
    End Property

    Public Property IdImpuestos() As Integer
        Get
            Return m_IdImpuestos
        End Get
        Set(ByVal value As Integer)
            m_IdImpuestos = value
        End Set
    End Property

    Public Property TrasTasa() As String
        Get
            Return m_TrasTasa
        End Get
        Set(ByVal value As String)
            m_TrasTasa = value
        End Set
    End Property

    Public Property TrasImporte() As Double
        Get
            Return m_TrasImporte
        End Get
        Set(ByVal value As Double)
            m_TrasImporte = value
        End Set
    End Property

    Public Property IVA() As Double
        Get
            Return m_IVA
        End Get
        Set(ByVal value As Double)
            m_IVA = value
        End Set
    End Property

    Public Property IEPS() As Double
        Get
            Return m_IEPS
        End Get
        Set(ByVal value As Double)
            m_IEPS = value
        End Set
    End Property

    Public Property IVBSS() As Double
        Get
            Return m_IVBSS
        End Get
        Set(ByVal value As Double)
            m_IVBSS = value
        End Set
    End Property

    Public Property Estatal() As Double
        Get
            Return m_Estatal
        End Get
        Set(ByVal value As Double)
            m_Estatal = value
        End Set
    End Property

    Public Property ISR() As Double
        Get
            Return m_ISR
        End Get
        Set(ByVal value As Double)
            m_ISR = value
        End Set
    End Property

    Public Property Predial() As String
        Get
            Return m_Predial
        End Get
        Set(ByVal value As String)
            m_Predial = value
        End Set
    End Property

    Public Property NumAduana() As String
        Get
            Return m_NumAduana
        End Get
        Set(ByVal value As String)
            m_NumAduana = value
        End Set
    End Property

    Public Property FechaAduana() As Date
        Get
            Return m_FechaAduana
        End Get
        Set(ByVal value As Date)
            m_FechaAduana = value
        End Set
    End Property

    Public Property NombreAduana() As String
        Get
            Return m_NombreAduana
        End Get
        Set(ByVal value As String)
            m_NombreAduana = value
        End Set
    End Property

    Public Property ivaPA() As Double
        Get
            Return m_ivaPA
        End Get
        Set(ByVal value As Double)
            m_ivaPA = value
        End Set
    End Property

    Public Property iepsPA() As Double
        Get
            Return m_iepsPA
        End Get
        Set(ByVal value As Double)
            m_iepsPA = value
        End Set
    End Property

    Public Property ivbssPA() As Double
        Get
            Return m_ivbssPA
        End Get
        Set(ByVal value As Double)
            m_ivbssPA = value
        End Set
    End Property

    Public Property estatalPA() As Double
        Get
            Return m_estatalPA
        End Get
        Set(ByVal value As Double)
            m_estatalPA = value
        End Set
    End Property

    Public Property isrPA() As Double
        Get
            Return m_isrPA
        End Get
        Set(ByVal value As Double)
            m_isrPA = value
        End Set
    End Property

    Public Property tipoIVA() As String
        Get
            Return m_tipoIVA
        End Get
        Set(ByVal value As String)
            m_tipoIVA = value
        End Set
    End Property

    Public Property tasaIVA() As Double
        Get
            Return m_tasaIVA
        End Get
        Set(ByVal value As Double)
            m_tasaIVA = value
        End Set
    End Property

    Public Property tasaIEPS() As Double
        Get
            Return m_tasaIEPS
        End Get
        Set(ByVal value As Double)
            m_tasaIEPS = value
        End Set
    End Property

    Public Property tasaRetIVA() As Double
        Get
            Return m_tasaRetIVA
        End Get
        Set(ByVal value As Double)
            m_tasaRetIVA = value
        End Set
    End Property

    Public Property tasaRetISR() As Double
        Get
            Return m_tasaRetISR
        End Get
        Set(ByVal value As Double)
            m_tasaRetISR = value
        End Set
    End Property

    Public Property impIEPS() As Double
        Get
            Return m_impIEPS
        End Get
        Set(ByVal value As Double)
            m_impIEPS = value
        End Set
    End Property

    Public Property impIVA() As Double
        Get
            Return m_impIVA
        End Get
        Set(ByVal value As Double)
            m_impIVA = value
        End Set
    End Property

    Public Property impRIVA() As Double
        Get
            Return m_impRIVA
        End Get
        Set(ByVal value As Double)
            m_impRIVA = value
        End Set
    End Property

    Public Property impISR() As Double
        Get
            Return m_impISR
        End Get
        Set(ByVal value As Double)
            m_impISR = value
        End Set
    End Property
#End Region

#Region "Funciones Públicas"
    Public Sub New()
        IdCFDConceptos = 0
        IdCFDFacturas = 0
        IdEmpresa = 0
        Clave = ""
        Cantidad = 0D
        Unidad = ""
        NoIdentificacion = ""
        Descripcion = ""
        ValorUnitario = 0D
        Importe = 0D
        PorcDescValorUnitario = 0
        ValDescValorUnitario = 0D
        ImporteConDesc = 0D
        IdImpuestos = 0
        TrasTasa = ""
        TrasImporte = 0D
        IVA = 0D
        IEPS = 0D
        IVBSS = 0D
        Estatal = 0D
        ISR = 0D
        Predial = ""
        Me.NumAduana = ""
        Me.FechaAduana = DateTime.Now()
        Me.NombreAduana = ""
        ivaPA = 0D
        iepsPA = 0D
        ivbssPA = 0D
        estatalPA = 0D
        isrPA = 0D
        tipoIVA = ""
        tasaIVA = 0D
        tasaIEPS = 0D
        tasaRetIVA = 0D
        tasaRetISR = 0D
        impIVA = 0D
        impIEPS = 0D
        impRIVA = 0D
        impISR = 0D
    End Sub
#End Region
End Class